home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 27.zip / BS1 part 27 / Superbase4_d2.adf / Trading / STKRCE.SBP < prev    next >
Text File  |  1992-08-05  |  2KB  |  78 lines
  1. SBP
  2.  ÿ½   STKRCE
  3.  ÿ½   Cash Audit report
  4.  ÿ½   Last updated Jan 21, 90
  5.  
  6.  ÿ³ÿ_ÿwrerror
  7.  ÿ´ÿ™"cash"
  8.  hd1$ÿ"Cash Audit report at "ÿÿ(ÿQ,"mmm dd,yy")
  9.  hd12$ÿ"Ref: STKRCE"
  10.  
  11. m1: 
  12.  ÿÁSigned_Amt.CASH
  13.  ÿ}ÿÁ
  14.  
  15.  ÿ{@64;"============"
  16.  ÿ{@1;"Net Cash Received:";@67;&12ÿlSigned_Amt.CASH
  17.  ÿ{@64;"============"
  18.  ÿ’ÿÁ
  19.  
  20.  ÿŸ
  21.  ÿ{@1;"Cash Audit Report at";@22;&15ÿ(ÿQ,"mmm dd,yy");@65;"Ref: STKRC"
  22.  ÿ{
  23.  ÿ{@1;"Date        Ref  Client   Name                     Cash ref          Amount "
  24.  ÿ{@1;"----------- ---- -------- ------------------------ ------------ -----------"
  25.  ÿ’ÿŸ
  26.  
  27.  ÿžBatch_ref.CASH,Signed_Amt.CASH
  28.  ÿ€ÿžBatch_ref.CASH
  29.  ÿ{@1;"Batch reference:";@18;&6Batch_ref.CASH;@27;"Date:";@33;&10Batch_date.CASH;@45;"Type:";@51;&8Trans_Desc.CASH
  30.  ÿ’ÿž
  31.  
  32.  ÿ}ÿžBatch_ref.CASH
  33.  ÿ{@64;"============"
  34.  ÿ{@1;"Batch total:";@67;&12ÿlSigned_Amt.CASH
  35.  ÿ{
  36.  ÿ’ÿž
  37.  
  38.  ÿÉ@1;&10Trans_date.CASH;@13;&5Trans_ref.CASH;@18;&8Client.CASH;@27;&24Client.CLIENTS;
  39.  @52;&12Cash_ref.CASH;@65;&11Signed_Amt.CASH
  40.  ÿÐClient.CASHÿCustomer_Ref.CLIENTSÿ Printed_yn.CASHÿ"n"
  41.  ÿµBatch_ref.CASH
  42.  
  43. m2: 
  44.  ÿ¡p$ÿ"d"ÿp
  45. ÿÊÿËss14$
  46. ÿÏÿ¥ÿÿß
  47.  ÿ’ÿ¡
  48.  
  49. repeat: 
  50.  b%ÿ0
  51.  ÿÂms4$,"",130,a%
  52.  ÿ¡(a%ÿ0ÿ p$ÿ"p")ÿp
  53. ÿÍPrinted_yn.CASHÿ"y"ÿÐPrinted_yn.CASHÿ"n"
  54. ÿ’ÿÍ
  55.  ÿ^
  56. ÿÂms3$,"",135,b%
  57.  ÿ’ÿ¡
  58.  ÿ¡b%ÿ0ÿpÿwrexit
  59.  ÿ¡p$ÿ"p"ÿpÿ¹;
  60.  ÿwm1
  61.  
  62. rexit: 
  63.  ÿ„"menu"
  64.  
  65. rerror:ÿ½ On error
  66.  res%ÿ0
  67.  ÿ¡ÿ&ÿ11ÿp
  68. ÿÂms21$,ms22$,130,a%:ÿ¡a%ÿ1ÿpres%ÿ1
  69.  ÿ^ÿ¡ÿ&ÿ27ÿp
  70. ÿÂms11$,ms12$,100,a%:res%ÿ2
  71.  ÿ^
  72. ÿÂÿ((ÿ&),"",113,a%:res%ÿ1
  73.  ÿ’ÿ¡
  74.  ÿ¡res%ÿ1ÿpÿyrepeat 
  75.  ÿ¡res%ÿ2ÿpÿyrexit
  76.  ÿ
  77.  
  78.